#!/usr/bin/perl -Ilib -w

eval 'exec /usr/bin/perl -Ilib -w -S $0 ${1+"$@"}'
    if 0; # not running under some shell
use Geometry::Point;
my $p = Geometry::Point->new(x => 1, y => 2);
